/** header **/

#include "error.h"

/**********************************************************************************************
 * __internal_error
 *********************************************************************************************/
void __internal_error (const __string message, const __string file,
                       const __string function, int line)
{
  fprintf (stderr, "internal error in file %s line %i : %s in function %s\n",
           file, line, message, function);
  fflush (stderr);
  exit (EXIT_FAILURE);
}

/**********************************************************************************************
 * __debug_info
 *********************************************************************************************/
void __debug_info (const __string file, const __string function, int line) {
  fprintf (stderr, "\n  debug [file %s line %i in function %s] : ", file, line, function);
  fflush (stderr);
  return;
}

/**********************************************************************************************
 * __debug_print
 *********************************************************************************************/
void __debug_print (const __string message) {
  fprintf (stderr, message);
  fflush (stderr);
  return;
}

